home *** CD-ROM | disk | FTP | other *** search
/ Mac100% 1999 April / MAC100-1999-04.ISO.7z / MAC100-1999-04.ISO / ｵﾝﾗｲﾝｿﾌﾄ定点観測 / Demo / MacToPic Plus 8.8.0 Demo.sea / MacToPic +™ Demo / Plus sample programs / SELECTFILE.PROGRAM < prev    next >
Text File  |  1990-11-09  |  524b  |  23 lines
  1. * SELECTFILE PROGRAM
  2. * Lets the operator select an existing capture file for appending data to.
  3. * records data into the selected file.
  4. * detects operator cancel
  5. *  SELECTFILE  PROGRAM sample written by Rich Love, Carnation Software 1990
  6. *  for use with MacToPic Plus
  7. *
  8. PRINT @(-1)
  9. PRINT CHAR(27):"~7":;     *SELECT A CAPTURE FILE
  10. PROMPT ""
  11. INPUT A
  12. IF A="Canceled" THEN
  13. PRINT"Operator canceled"
  14. GOTO 30
  15. END ELSE
  16. PRINT"This data has been appended to the selected file"
  17. PRINT CHAR(27):"~4":;   *Turn capture off
  18. 30 END
  19. END
  20.  
  21.  
  22. :
  23.